Deze procedure vindt plaats voordat een UserForm wordt afgesloten.
Syntaxis
Private Sub UserForm_QueryClose(cancel As Integer, closemode As Integer)
De syntaxis van de procedure QueryClose bestaat uit de volgende onderdelen:
| Onderdeel | Beschrijving |
|---|---|
| cancel | Een integer. Als u dit argument instelt op een andere waarde dan 0, wordt de procedure QueryClose in alle geladen gebruikersformulieren stopgezet en kunnen de UserForm en de toepassing niet afgesloten worden. |
| closemode | Een waarde of constante die de aanleiding tot de procedure QueryClose aangeeft. |
Resultaatwaarden
Het argument closemode geeft de volgende waarden als resultaat:
| Constante | Waarde | Beschrijving |
|---|---|---|
| vbFormControlMenu | 0 | De gebruiker heeft de opdracht Sluiten in het systeemmenu van de UserForm gekozen. |
| vbFormCode | 1 | De instructie Unload is opgeroepen in de programmacode. |
| vbAppWindows | 2 | De momenteel werkzame Windows-omgeving gaat stoppen. (Alleen in Visual Basic 5.0.) |
| vbAppTaskManager | 3 | Taakoverzicht van Windows gaat de toepassing afsluiten. (Alleen in Visual Basic 5.0.) |
Deze constanten staan in het Objectenoverzicht in de objectenbibliotheek van Visual Basic for Applications. Merk op dat vbFormMDIForm ook in het Objectenoverzicht staat, maar nog niet ondersteund wordt.
Notities
Deze procedure wordt met name gebruikt om er zeker van te zijn, dat er geen onafgemaakte taken in de gebruikersformulieren in een toepassing overblijven voordat die toepassing wordt afgesloten. Bijvoorbeeld: als een gebruiker nieuwe gegevens niet heeft opgeslagen in een UserForm, kan de toepassing de gebruiker ertoe aanzetten de gegevens te bewaren.
Als een toepassing afgesloten wordt, kunt u de gebeurtenisprocedure QueryClose gebruiken om de eigenschap Cancel in te stellen op True, waarmee u het afsluitproces stopt.